PROGRAM Test
REAL :: x 

esse char naum existe $
x = 23. !um int + um erro pois o ponto nao pode aparecer solto
.BOOL.   !esse literal nao existe
      uma string nao  pode ser assim "lalala